home *** CD-ROM | disk | FTP | other *** search
/ Cream of the Crop 26 / Cream of the Crop 26.iso / program / ddj0897.zip / RCSC.ZIP / PACKAGES / AWK320.ZIP / PAT.AWK < prev    next >
Text File  |  1990-02-08  |  115b  |  4 lines

  1. # verify that a record follows a pattern
  2.  
  3. NF==1{ if ( $1 ~ /^ab(ab|ba)*abba$/ ) print "yes" ; else print "no" }
  4.